''========================================================
'' Autor: 		Luis Antonio Lara Capetillo
'' Fecha Creación: 	22/11/2012
'' Descripcion: 	Clase perteneciente a la capa de negocios
''========================================================

Imports CapaDatos
Imports CapaEntidad

Public Class CN_DataAccesFormatoUnico_Vehiculo_Archivo

	Public Sub InsertarDataAccesFormatoUnico_Vehiculo_Archivo(ByVal DataAccesFormatoUnico_Vehiculo_Archivo As DataAccesFormatoUnico_Vehiculo_Archivo, ByVal conexion As String, ByRef Verificador As Integer)
		Try
			Dim claseCapaDatos As New CapaDatos.CD_DataAccesFormatoUnico_Vehiculo_Archivo()
			claseCapaDatos.InsertarDataAccesFormatoUnico_Vehiculo_Archivo(DataAccesFormatoUnico_Vehiculo_Archivo, conexion, Verificador)
		Catch ex As Exception
			Throw ex
		End Try
	End Sub
	Public Sub ConsultaDataAccesFormatoUnico_Vehiculo_Archivo(ByRef Grid As System.Web.UI.WebControls.GridView, ByVal DataAccesFormatoUnico_Vehiculo_Archivo As DataAccesFormatoUnico_Vehiculo_Archivo, ByVal conexion As String, ByRef List As System.Collections.Generic.List(Of DataAccesFormatoUnico_Vehiculo_Archivo))
		Try
			Dim claseCapaDatos As New CapaDatos.CD_DataAccesFormatoUnico_Vehiculo_Archivo()
			claseCapaDatos.ConsultaDataAccesFormatoUnico_Vehiculo_Archivo(DataAccesFormatoUnico_Vehiculo_Archivo, conexion, List)

			Grid.DataSource = List
			Grid.DataBind()
		Catch ex As Exception
			Throw ex
		End Try
	End Sub
	Public Sub ModificarDataAccesFormatoUnico_Vehiculo_Archivo(ByVal DataAccesFormatoUnico_Vehiculo_Archivo As DataAccesFormatoUnico_Vehiculo_Archivo, ByVal conexion As String, ByRef Verificador As Integer)
		Try
			Dim claseCapaDatos As New CapaDatos.CD_DataAccesFormatoUnico_Vehiculo_Archivo()
			claseCapaDatos.ModificarDataAccesFormatoUnico_Vehiculo_Archivo(DataAccesFormatoUnico_Vehiculo_Archivo, conexion, Verificador)
		Catch ex As Exception
		Throw ex
		End Try
	End Sub

End Class